{-
 
  Copyright 2022-23, Juspay India Pvt Ltd
 
  This program is free software: you can redistribute it and/or modify it under the terms of the GNU Affero General Public License
 
  as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version. This program
 
  is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
 
  or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Affero General Public License for more details. You should have received a copy of
 
  the GNU Affero General Public License along with this program. If not, see <https://www.gnu.org/licenses/>.
-}

module Components.SwitchButtonView.Controller where

import Styles.Colors as Color
import Prelude (class Show)

instance showAction :: Show Action where
  show (OnClick) = "OnClick"

data Action = OnClick


type Config = {
  backgroundColorOnActive :: String,
  backgroundColorOnInActive :: String,
  isActive :: Boolean,
  handleColor :: String,
  isClickable :: Boolean
}

config :: Config
config = {
    backgroundColorOnActive : Color.blue800,
    backgroundColorOnInActive : Color.black600,
    isActive : false,
    handleColor : Color.white900,
    isClickable : true
}
